home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1995…tember: Reference Library / Dev.CD Sep 95 RL / Dev.CD Sep 95 RL.toast / mac / Technical Documentation / develop / develop Issue 8 code / AUX Hybrid Apps / AUX System Calls / src / auxsignal.c < prev    next >
Encoding:
Text File  |  1991-10-09  |  406 b   |  25 lines  |  [TEXT/tefi]
  1. pascal long     AUXDispatch(selector,p)
  2. short           selector;
  3. char            *p;
  4. extern        0xABf9;
  5.  
  6. #define AUX_GET_SIGNAL 3              /* get pointer to signal routine */
  7.  
  8. typedef int (*fn)();
  9.  
  10.  
  11. fn auxsignal(sig, func)
  12. int sig;
  13. fn func;
  14. {
  15.     int (*signal_ptr)();
  16.     int (*ret_val)();
  17.     
  18.     
  19.     AUXDispatch(AUX_GET_SIGNAL,(char *)&signal_ptr);
  20.     
  21.     ret_val = (int (*)())(*signal_ptr)(sig, func); 
  22.     return(ret_val);
  23. }
  24.  
  25.